﻿Public Class PromoBE

    Private _Al As DateTime
    Public Property Al() As DateTime
        Get
            Return _Al
        End Get
        Set(ByVal value As DateTime)
            _Al = value
        End Set
    End Property
    Private _CantV As Decimal
    Public Property CantV() As Decimal
        Get
            Return _CantV
        End Get
        Set(ByVal value As Decimal)
            _CantV = value
        End Set
    End Property
    Private _Compras As Decimal
    Public Property Compras() As Decimal
        Get
            Return _Compras
        End Get
        Set(ByVal value As Decimal)
            _Compras = value
        End Set
    End Property
    Private _Del As DateTime
    Public Property Del() As DateTime
        Get
            Return _Del
        End Get
        Set(ByVal value As DateTime)
            _Del = value
        End Set
    End Property
    Private _Descripcion As String
    Public Property Descripcion() As String
        Get
            Return _Descripcion
        End Get
        Set(ByVal value As String)
            _Descripcion = value
        End Set
    End Property
    Private _Fecha As DateTime
    Public Property Fecha() As DateTime
        Get
            Return _Fecha
        End Get
        Set(ByVal value As DateTime)
            _Fecha = value
        End Set
    End Property
    Private _Id As Integer
    Public Property Id() As Integer
        Get
            Return _Id
        End Get
        Set(ByVal value As Integer)
            _Id = value
        End Set
    End Property
    Private _IdEmpresa As Int16
    Public Property IdEmpresa() As Int16
        Get
            Return _IdEmpresa
        End Get
        Set(ByVal value As Int16)
            _IdEmpresa = value
        End Set
    End Property
    Private _IdPromocion As Integer
    Public Property IdPromocion() As Integer
        Get
            Return _IdPromocion
        End Get
        Set(ByVal value As Integer)
            _IdPromocion = value
        End Set
    End Property
    Private _Pagas As Decimal
    Public Property Pagas() As Decimal
        Get
            Return _Pagas
        End Get
        Set(ByVal value As Decimal)
            _Pagas = value
        End Set
    End Property
    Private _PedirConf As Int16
    Public Property PedirConf() As Int16
        Get
            Return _PedirConf
        End Get
        Set(ByVal value As Int16)
            _PedirConf = value
        End Set
    End Property
    Private _Porc As Decimal
    Public Property Porc() As Decimal
        Get
            Return _Porc
        End Get
        Set(ByVal value As Decimal)
            _Porc = value
        End Set
    End Property
    Private _Status As String
    Public Property Status() As String
        Get
            Return _Status
        End Get
        Set(ByVal value As String)
            _Status = value
        End Set
    End Property
    Private _Tipo As Int16
    Public Property Tipo() As Int16
        Get
            Return _Tipo
        End Get
        Set(ByVal value As Int16)
            _Tipo = value
        End Set
    End Property
    Private _TodosC As Int16
    Public Property TodosC() As Int16
        Get
            Return _TodosC
        End Get
        Set(ByVal value As Int16)
            _TodosC = value
        End Set
    End Property
    Private _Usr As String
    Public Property Usr() As String
        Get
            Return _Usr
        End Get
        Set(ByVal value As String)
            _Usr = value
        End Set
    End Property
    Private _Vigencia As Int16
    Public Property Vigencia() As Int16
        Get
            Return _Vigencia
        End Get
        Set(ByVal value As Int16)
            _Vigencia = value
        End Set
    End Property
End Class
